if the timer < (pLastJGuyTime + pJGuyIntervalTime) then
exit
end if
set the castNum of sprite pGuyChan to getAt(pJGuyList, pJGuyCounter)
set pJGuyCounter to pJGuyCounter + 1
if pJGuyCounter = (count(pJGuyList) + 1) then
set pJGuyCounter to 1
end if
set pLastJGuyTime to the timer
end
on mSwing me
set the memberNum of sprite pButtonChan to pButtonMem + 1
puppetSnd(1, "Jump")
set the memberNum of sprite pGuyChan to pJumpMember
updateStage()
sinSlideUnder(pGuyChan, 200, 164, 9, 7)
set the memberNum of sprite pGuyChan to gBlank
set the loc of sprite pGuyChan to gInitPoint
set the memberNum of sprite pStringChan to pFRopeMember + 3
updateStage()
puppetSnd(1, "Swing")
set forward to 1
set i to 4
repeat while the mouseDown
set theTime to the timer + 6
if forward then
set i to i + 1
set the memberNum of sprite pStringChan to pFRopeMember + i - 1
updateStage()
if i = 7 then
set forward to 0
end if
repeat while the timer < theTime
if not (the mouseDown) then
exit repeat
end if
end repeat
next repeat
end if
set i to i - 1
set the memberNum of sprite pStringChan to pFRopeMember + i - 1
updateStage()
if i = 1 then
set forward to 1
end if
repeat while the timer < theTime
if not (the mouseDown) then
exit repeat
end if
end repeat
end repeat
sound stop 1
set the memberNum of sprite pButtonChan to pButtonMem
set theTime to the timer + 7
set the memberNum of sprite pStringChan to pFJRopeMember + i - 1
set the memberNum of sprite pGuyChan to (2 * (i - 1)) + pFFlyMember
set the loc of sprite pGuyChan to getAt([point(118, 54), point(135, 98), point(196, 155), point(259, 177), point(335, 165), point(402, 116), point(422, 84)], i)
UStage(theTime)
puppetSnd(1, "fall")
if i = 7 then
set forward to 1
end if
if i = 1 then
set forward to 0
end if
mJumpOff(me, i, forward)
mLose(me)
end
on mJumpOff me, index, forward
if forward then
set ├╕ to PI * getAt([1.69999999999999996, 1.75, 1.83000000000000007, 0, 0.20000000000000001, 0.25, 0.29999999999999999], index)
else
set ├╕ to PI * getAt([0.69999999999999996, 0.75, 0.82999999999999996, 1, 1.15999999999999992, 1.25, 1.30000000000000004], index)
end if
set vo to 50
set g to 8
set xo to the locH of sprite pGuyChan
set yo to the locV of sprite pGuyChan
set t to 1
set downflag to 0
set iIndex to index
set stringRestoreInt to 9
set lastTime to the timer
repeat while the locV of sprite pGuyChan < 360
set theTime to the timer + 6
set oldY to the locV of sprite pGuyChan
set newX to xo + (vo * cos(├╕) * t)
set newY to yo - ((vo * sin(├╕) * t) - (g * power(t, 2)))
if (newY > oldY) and not downflag then
set the memberNum of sprite pGuyChan to the memberNum of sprite pGuyChan + 1
set downflag to 1
end if
set the locH of sprite pGuyChan to newX
set the locV of sprite pGuyChan to newY
set t to t + 1
if iIndex < 4 then
if the timer > (lastTime + stringRestoreInt) then
set iIndex to iIndex + 1
set the memberNum of sprite pStringChan to pFJRopeMember + iIndex - 1
set lastTime to the timer
end if
else
if iIndex > 4 then
if the timer > (lastTime + stringRestoreInt) then
set iIndex to iIndex - 1
set the memberNum of sprite pStringChan to pFJRopeMember + iIndex - 1
set lastTime to the timer
end if
end if
end if
UStage(theTime)
if mLandOnBranch(me) then
abort()
end if
end repeat
repeat while soundBusy(1)
if iIndex < 4 then
if the timer > (lastTime + stringRestoreInt) then
set iIndex to iIndex + 1
set the memberNum of sprite pStringChan to pFJRopeMember + iIndex - 1
set lastTime to the timer
end if
else
if iIndex > 4 then
if the timer > (lastTime + stringRestoreInt) then
set iIndex to iIndex - 1
set the memberNum of sprite pStringChan to pFJRopeMember + iIndex - 1
set lastTime to the timer
end if
end if
end if
updateStage()
end repeat
end
on mLose me
resetGame()
end
on mLandOnBranch me
if inside(the loc of sprite pGuyChan, rect(437, 134, 478, 168)) then
mWin(me)
return 1
else
return 0
end if
end
on mWin me
set the memberNum of sprite pGuyChan to pLandMember
set the loc of sprite pGuyChan to point(458, 150)
puppetSnd(1, "Land")
updateStage()
repeat while soundBusy(1)
end repeat
puppetSnd(1, "win")
updateStage()
repeat while soundBusy(1)
repeat with offset = 1 to 4
set theTime to the timer + 10
set the memberNum of sprite pGuyChan to pLandMember + offset - 1
